home *** CD-ROM | disk | FTP | other *** search
/ Star Festival... a Return to Japan / Star Festival... a Return to Japan.iso / pc / STARFESTIVAL / 14d2.dir / 00001.ls next >
Encoding:
Text File  |  1999-04-02  |  1.4 KB  |  55 lines
  1. on startMovie
  2.   global qtChan, gKnobSprite
  3.   sprite(10).visible = 0
  4.   sprite(12).visible = 0
  5.   puppetSprite(46, 1)
  6.   qtChan = 11
  7.   sprite(qtChan).volume = 256
  8.   preLoad(qtChan - 1)
  9.   set the mouseDownScript to EMPTY
  10.   set the mouseUpScript to EMPTY
  11.   gKnobSprite = 28
  12.   setUpKnob()
  13. end
  14.  
  15. on idle
  16.   global gCursorReady
  17.   if gCursorReady = 1 then
  18.     cursor(200)
  19.     checkCursors()
  20.     set the locH of sprite 46 to the mouseH
  21.     set the locV of sprite 46 to the mouseV
  22.     updateStage()
  23.   end if
  24. end
  25.  
  26. on checkCursors
  27.   global gMagCursor
  28.   set the castNum of sprite 46 to the number of member "curs1"
  29.   if rollOver(6) then
  30.     set the castNum of sprite 46 to the number of member "hotCursor"
  31.   end if
  32.   if rollOver(7) then
  33.     set the castNum of sprite 46 to the number of member "curs1"
  34.   end if
  35.   if rollOver(14) then
  36.     set the castNum of sprite 46 to the number of member "hotCursor"
  37.   end if
  38.   if rollOver(27) then
  39.     set the castNum of sprite 46 to the number of member "hotCursor"
  40.   end if
  41.   repeat with i = 33 to 35
  42.     if rollOver(i) then
  43.       set the castNum of sprite 46 to the number of member "hotCursor"
  44.     end if
  45.   end repeat
  46.   if rollOver(38) then
  47.     set the castNum of sprite 46 to the number of member "hotCursor"
  48.   end if
  49.   repeat with i = 40 to 43
  50.     if rollOver(i) then
  51.       set the castNum of sprite 46 to the number of member "hotCursor"
  52.     end if
  53.   end repeat
  54. end
  55.